function [result] = read2(input,dim1,dim2)
    result(dim1,dim2)=0.0;
    a=dim2;
    for h=1:dim1
        for i=1:dim2
            result(h,i)=input(a*(h-1)+i);
        end
    end
end